home *** CD-ROM | disk | FTP | other *** search
/ Nautilus 1993 July / Nautilus CD Magazine Volume 3-7 July 1993 Windows Edition.mdf / services / sub.tbk (.txt) < prev    next >
Asymetrix ToolBook File  |  1993-06-13  |  44KB  |  921 lines

  1. NAUTILUS Subscription Form
  2. :PRINTLAYOUT
  3. 09 +w=
  4. Tms Rmn
  5. banner
  6. instr
  7. printThis
  8. printThis2
  9. total
  10. :REPORTDATA
  11. *    stem
  12. s Rmn
  13. printThis
  14. total
  15. phone1
  16. phone2
  17. offer
  18. total
  19. printThis
  20. printThis2
  21. label ship
  22. label tax
  23. label total
  24. total
  25. total
  26. Tms Rmn
  27. banner
  28. instr
  29. printThis
  30. printThis2
  31. label ship
  32. label tax
  33. label total
  34. total
  35. total
  36. Sign me up for 12 issues at
  37. ( * Ship/Handling Add'tl)ling Add'tl)
  38. banner
  39. instr
  40. printThis
  41. printThis2
  42. (Prices Subject To Change))  Prices Subject To Change))))
  43. St:::::::::
  44. First Name:
  45. Middle I.::
  46. Last Name::
  47. Title::I.::
  48. Company::::
  49. Address::::
  50. City:::::::
  51. Zip::::::::
  52. Country::::
  53. Voice Phone:
  54. FAX:try.:::
  55. How did you hear about NAUTILUS?]
  56. (Card #):::
  57. (Exp Date):
  58. (Country Name)
  59. Sales Tax::Info*:
  60. Credit Card Information:
  61. price box
  62. total
  63. Subtotal:  
  64. Sales Tax::
  65. Shipping:::
  66. Total:al:::
  67. first
  68. title
  69. company
  70. address
  71. state
  72. upperCase(
  73. = "OH") 
  74. = "OHIO")
  75. B"OH" 
  76. = "FL") 
  77. = "FLORIDA")
  78. B"FL" 
  79. leaveRecordField
  80. leaveRecordField
  81. buttonUp
  82. FLORIDA
  83. buttonUp
  84. 4subDomestic, subBase, subCost, subShip, subTax
  85. B"USA" 
  86. "country" = 
  87. B"OH" 
  88. B"FL" 
  89. setTotals 
  90. buttonUp
  91. buttonUp
  92. country
  93. country
  94. country
  95. country
  96. setTotals
  97. subDomestic
  98. subBase
  99. subCost
  100. subShip
  101. subTax
  102. North America
  103. International
  104. country
  105. phone1
  106. phone2
  107. 4subOffer
  108. setTotals 
  109. buttonUp
  110. buttonUp
  111. Offer
  112. setTotals
  113. subOffer
  114. special offer
  115. "offer"; 
  116. buttonUp
  117. buttonUp
  118. offer
  119. Special Offer...
  120. renewal
  121. "offer" 
  122. "Renewal"; 
  123. buttonUp
  124. buttonUp
  125. offer
  126. Renewal
  127. This is a renewal
  128. offer
  129. pcVersion
  130. PC Version
  131. macVersion
  132. Mac Version
  133. MasterCard
  134. subBase
  135. (Resident of ... ?)ick State of resi
  136. B"USA" 
  137. setTotals 
  138. initButton
  139. buttonUp
  140. initButton
  141. buttonUp
  142. buttonUp
  143. setTotals
  144. initButton
  145. Florida
  146. Michigan
  147. 119.40
  148. 18.00
  149. 137.401
  150. To subscribe, complete this form, then Link, mail, FAX or call for prompt attention:
  151. (800) 637-3472; Intl, (614) 766-3165; FAX (614) 761-4110; 7001 Discovery Blvd, Dublin OH 43017  (USA).
  152. Subscribe To NAUTILUS!
  153. $ 9.95 ea.**9999999 ea.*
  154. Outbox
  155. enabled
  156. false
  157. myEnabled
  158. Save to Outbox
  159. Print
  160. Print
  161. clear
  162. clearForm
  163. buttonUp
  164. buttonUp
  165. clearForm
  166. Clear
  167. return
  168. 4homeBook
  169. K= "Exit")
  170. sysSuspendMessages 
  171. default
  172. buttonup
  173. buttonup
  174. default
  175. homeBook
  176. false
  177. false
  178. activateInstance
  179. 4homeBook, fromCD, outsideShell, DEVELOP
  180. initVars
  181. B"Return" 
  182. "Exit"
  183. enabled 
  184. B"Outbox" 
  185. clearForm 
  186. linkBook, 
  187. -- NAUTILUS 
  188.  globals
  189. outBoxPath, topicName
  190. tempList 
  191. "STARTUP.TBK,
  192. NAUT_BW.
  193. LINK.
  194. testName 
  195. "OutboxFile()" 
  196.  "ToolBook" 
  197. r= "OK")
  198. "getNautilusVar(
  199. r= "OK"); 
  200. OutBoxFile()
  201. value
  202. (the 
  203. "0,0,0"
  204. "0,50,0"; 
  205. excludeTab 
  206. myEnabled 
  207. eInstance
  208. enterBook
  209. leaveBook
  210. activateInstance
  211. initVars
  212. rightButtonDoubleClick
  213. enabled
  214. activateInstance
  215. enterBook
  216. enterBook
  217. {initVars
  218. Return
  219. Return
  220. Return
  221. Outbox
  222. enabled
  223. sizeToPage
  224. homeBook
  225. fromCD
  226. outsideShell
  227. DEVELOP
  228. leaveBook
  229. clearForm
  230. DEVELOP
  231. initVars
  232. STARTUP.TBK,NAUTILUS.TBK,NAUT_BW.TBK,LINK.TBK
  233. OutboxFile()
  234. ToolBook
  235. getNautilusVar(linkBook)
  236. OutBoxFile
  237. ToolBook
  238. testName
  239. tempList
  240. outsideShell
  241. outBoxPath
  242. topicName
  243. homeBook
  244. linkBook
  245. fromCD
  246. enabled
  247. button
  248. 0,0,0
  249. 0,50,0
  250. myEnabled
  251. value
  252. rightButtonDoubleClick
  253. DEVELOP
  254. 4outBoxPath, topicName
  255. sysSuspendMessages 
  256. omyEnabled)
  257. order via Link, you must" && \
  258. install NAUTILUS 
  259. your hard disk 
  260. have" &&\
  261. &running."
  262. verify()
  263. "Please include" && 
  264. & "."
  265. B"renewal"); 
  266. "RENEWAL"; 
  267. subOrder 
  268. B"pcVersion"); 
  269. "PC";
  270. "Mac"; 
  271. \" * 100 
  272. "ship" * 100 
  273. "tax" * 100 
  274. "total" * 100 
  275. "offer" 
  276. "mi" 
  277. "title" 
  278. "company" 
  279. "address" 
  280. "city" 
  281. "state" 
  282. "zip" 
  283. "country" 
  284. "phone1" 
  285. "phone2" 
  286. B"mc"); 
  287. "Master Card"
  288. B"visa"); 
  289. "Visa"
  290. "card" 
  291. "***--- Subscribe" & 
  292. srcFile 
  293. destFile 
  294.  & "SUB.TBK"
  295. FileCopy(" & 
  296. & "," & 
  297. & ")"
  298.  ToolBook 
  299. "Unable 
  300. ." & 
  301. default
  302. fName 
  303.  has been saved 
  304. Outbox.
  305. subscription 
  306. ." & 
  307. buttonUp
  308. buttonUp
  309. myEnabled
  310. To send this order via Link, you must
  311. first install NAUTILUS to your hard disk and have
  312. NAUTILUS running.
  313. verify
  314. Please include
  315. renewal
  316. RENEWAL
  317. pcVersion
  318. total
  319. offer
  320. first
  321. title
  322. company
  323. address
  324. state
  325. country
  326. phone1
  327. phone2
  328. Master Card
  329. ***--- Subscribe
  330. SUB.TBK
  331. Unable to save this order.
  332. SUB.ORD
  333. Message has been saved in your Outbox.  Please send via Link.
  334. Unable to save subscription order.
  335. fName
  336. default
  337. destFile
  338. srcFile
  339. subOrder
  340. outBoxPath
  341. topicName
  342. 4blankForm
  343. sysSuspendMessages 
  344. "Print Blank 
  345. Current Information?" 
  346. "Cancel"
  347. "NAUTILUS Subscription Order:" & 
  348.         fldText("Name","
  349. J") &\
  350. Title","title") &\
  351. 4Company","company") &\
  352. OAddress","address") &\
  353. j","city,state,zip") &\
  354. Country","country") &\
  355. Voice","phone1") &\
  356. FAX", "phone2") &\
  357. Offer","offer") &\
  358.         radioChoice("Version","pcVersion,macVersion") &\
  359. 7Credit Card","mc,visa")&\
  360. umber","card") &\
  361. Expires","
  362. ") &\
  363. "printThis" 
  364. "SubTotal:" & priceText("sub") &\
  365.         "Sales Tax:" & 
  366. "tax") &\
  367.         "s/h:" & 
  368. 8hip") &\
  369. Qt("total") &\
  370.         "*Prices Subject To Change" & 
  371.         "Signature:" & 
  372. 9& blankLine()
  373. "printThis2" 
  374. "banner,instr,
  375.  fldLabel, fldList
  376. " <> 
  377. & " " 
  378. t <> 
  379.  priceFld
  380. "0.00"; 
  381. btnList
  382. "x"; 
  383. "[" & mh & "]" && 
  384. "_______________________________________" & 
  385. buttonUp
  386. iceText
  387. fldText
  388. radioChoice
  389. priceText
  390. blankLine
  391. buttonUp
  392. Print Blank Form or Current Information?
  393. Blank Form
  394. Current Form
  395. Cancel
  396. Cancel
  397. Blank Form
  398. NAUTILUS Subscription Order:
  399. first,mi,last
  400. fldText
  401. Title
  402. title
  403. fldText
  404. Company
  405. company
  406. fldText
  407. Address
  408. address
  409. fldText
  410. city,state,zip
  411. fldText
  412. Country
  413. country
  414. fldText
  415. Voice
  416. phone1
  417. fldText
  418. phone2
  419. fldText
  420. Offer
  421. offer
  422. fldText
  423. Version
  424. pcVersion,macVersion
  425. radioChoice
  426. Credit Card
  427. mc,visa
  428. radioChoice
  429. Number
  430. fldText
  431. Expires
  432. fldText
  433. printThis
  434. SubTotal:
  435. priceText
  436. Sales Tax:
  437. priceText
  438. priceText
  439. *Total:
  440. total
  441. priceText
  442. *Prices Subject To Change
  443. Signature:
  444. blankLine
  445. printThis2
  446. banner,instr,printThis,printThis2
  447. blankForm
  448. fldText
  449. blankLine
  450. blankForm
  451. fldList
  452. fldLabel
  453. priceText
  454. priceFld
  455. radioChoice
  456. blankForm
  457. btnList
  458. fldLabel
  459. blankLine
  460. _______________________________________
  461. mh = "
  462. mh = "
  463. 4vCnt
  464. initForm
  465. clearTotals
  466. 4domesticSub
  467. B"USA" 
  468. setTotals
  469. setDomestic
  470. 4subBase, subCost, subShip, subTax
  471. "9.95"
  472. "119.40"
  473. "18.00"
  474. "0.00"
  475. setIntl
  476. "14.50"
  477. "174.00"
  478. "48.00"
  479. "0.00"
  480. 4subDomestic, 
  481. , subOffer
  482. B"OH" 
  483. .0575
  484. B"FL" 
  485. .0600
  486. B"MI" 
  487. .0400
  488.  = "Renewal"); 
  489. "$" && 
  490.  && "ea.*"
  491.  * 12)
  492. %"0.00"
  493. %"0.00"
  494. "tax" 
  495. "sub" 
  496. "ship" 
  497. %"0.00"
  498. "total" 
  499. clearForm
  500. "offer"
  501. "title"
  502. "company"
  503. "address"
  504. "city"
  505. "state"
  506. "zip"
  507. "country"
  508. "phone1"
  509. "phone2"
  510. initButton 
  511. B"special 
  512. B"pcVersion" 
  513. B"mc" 
  514. B"OH" 
  515. "card"
  516. "printThis"
  517. "printThis2"
  518. initFields
  519. 4linkBook, outsideShell
  520. " <> 
  521. J" <> 
  522. userInfo 
  523. "mi" 
  524. = "OH")
  525. B"OH" 
  526. = "FL")
  527. B"FL" 
  528. = "MI")
  529. B"MI" 
  530. = "CANADA") 
  531. = "MEXICO")
  532. = "Visa")
  533. B"visa" 
  534. = "MasterCard"); 
  535. B"mc" 
  536. verify
  537. ,First Name"
  538. J" = 
  539. J,Last 
  540. ,Address"
  541. ,City"
  542. ,State"
  543. "zip,Zip"
  544. ,Phone Number"
  545. ,Credit 
  546. ,Expiration Date"
  547. "Country" = 
  548. p     < 1)
  549.  (NAU # on 
  550. disc packaging)"
  551. ("Where did you 
  552. mhInit
  553. mhSaveAs
  554. fldList 
  555. "Nothing selected!"; 
  556. baseLines 
  557. drawDirect 
  558. drawTextDirect 
  559. fieldType 
  560. earTotals
  561. setDomestic
  562. setIntl
  563. buttonUp
  564. setTotals
  565. clearForm
  566. enterPage
  567. initForm
  568. enterRecordField
  569. initFields
  570. initButton
  571. mhInit
  572. clearTotals
  573. verify
  574. enterRecordField
  575. buttonUp
  576. radiobutton
  577. group
  578. enterPage
  579. sinitForm
  580. clearTotals
  581. buttonUp
  582. setTotals
  583. domesticSub
  584. setDomestic
  585. 119.40
  586. 18.00
  587. subBase
  588. subCost
  589. subShip
  590. subTax
  591. setIntl
  592. 14.50
  593. 174.00
  594. 48.00
  595. subBase
  596. subCost
  597. subShip
  598. subTax
  599. setTotals
  600. setDomestic
  601. Renewal
  602. setDomestic
  603. LsetIntl
  604. subBase
  605. total
  606. subDomestic
  607. subBase
  608. subCost
  609. subShip
  610. subTax
  611. subOffer
  612. clearForm
  613. offer
  614. first
  615. title
  616. company
  617. address
  618. state
  619. country
  620. phone1
  621. phone2
  622. initButton
  623. special offer
  624. initButton
  625. pcVersion
  626. initButton
  627. initButton
  628. initButton
  629. clearTotals
  630. printThis
  631. printThis2
  632. initForm
  633. setDomestic
  634. initFields
  635. initButton
  636. pcVersion
  637. setTotals
  638. initFields
  639. first
  640. userInfo
  641. first
  642. title
  643. company
  644. address
  645. state
  646. buttonUp
  647. buttonUp
  648. buttonUp
  649. CANADA
  650. MEXICO
  651. buttonUp
  652. country
  653. phone1
  654. phone2
  655. buttonUp
  656. MasterCard
  657. buttonUp
  658. linkBook
  659. outsideShell
  660. initButton
  661. buttonUp
  662. verify
  663. first
  664. first,First Name
  665. last,Last Name
  666. address
  667. address,Address
  668. city,City
  669. state
  670. state,State
  671. zip,Zip
  672. phone1
  673. phone,Phone Number
  674. card,Credit Card
  675. exp,Expiration Date
  676. Country
  677. country,Country
  678. offer
  679. Offer Number (NAU # on the disc packaging)
  680. Where did you get this disc?
  681. offer
  682. mhInit
  683. clearForm
  684. gmhSaveAs
  685. enterPage
  686. Nothing selected!
  687. background
  688. foreground
  689. clear
  690. fldList
  691. mh = "
  692. mh = "
  693. 4vCnt
  694. initForm
  695. clearTotals
  696. 4domesticSub
  697. B"USA" 
  698. setTotals
  699. setDomestic
  700. 4subBase, subCost, subShip, subTax
  701. "9.95"
  702. "119.40"
  703. "18.00"
  704. "0.00"
  705. setIntl
  706. "14.50"
  707. "174.00"
  708. "48.00"
  709. "0.00"
  710. 4subDomestic, 
  711. , subOffer
  712. B"OH" 
  713. .0575
  714. B"FL" 
  715. .0600
  716. B"MI" 
  717. .0400
  718.  = "Renewal"); 
  719. "$" && 
  720.  && "ea.*"
  721.  * 12)
  722. %"0.00"
  723. %"0.00"
  724. "tax" 
  725. "sub" 
  726. "ship" 
  727. %"0.00"
  728. "total" 
  729. clearForm
  730. "offer"
  731. "title"
  732. "company"
  733. "address"
  734. "city"
  735. "state"
  736. "zip"
  737. "country"
  738. "phone1"
  739. "phone2"
  740. initButton 
  741. B"special 
  742. B"pcVersion" 
  743. B"mc" 
  744. B"OH" 
  745. "card"
  746. "printThis"
  747. "printThis2"
  748. initFields
  749. 4linkBook, outsideShell
  750. " <> 
  751. J" <> 
  752. userInfo 
  753. "mi" 
  754. = "OH")
  755. B"OH" 
  756. = "FL")
  757. B"FL" 
  758. = "MI")
  759. B"MI" 
  760. = "CANADA") 
  761. = "MEXICO")
  762. = "Visa")
  763. B"visa" 
  764. = "MasterCard"); 
  765. B"mc" 
  766. verify
  767. ,First Name"
  768. J" = 
  769. J,Last 
  770. ,Address"
  771. ,City"
  772. ,State"
  773. "zip,Zip"
  774. ,Phone Number"
  775. ,Credit 
  776. ,Expiration Date"
  777. "Country" = 
  778.      < 1)
  779.  (NAU # on 
  780. disc packaging)"
  781. ("Where did you 
  782. mhInit
  783. mhSaveAs
  784. fldList 
  785. "Nothing selected!"; 
  786. baseLines 
  787. drawDirect 
  788. drawTextDirect 
  789. fieldType 
  790. earTotals
  791. setDomestic
  792. setIntl
  793. buttonUp
  794. setTotals
  795. clearForm
  796. enterPage
  797. initForm
  798. enterRecordField
  799. initFields
  800. initButton
  801. mhInit
  802. clearTotals
  803. verify
  804. enterRecordField
  805. buttonUp
  806. radiobutton
  807. group
  808. enterPage
  809. sinitForm
  810. clearTotals
  811. buttonUp
  812. setTotals
  813. domesticSub
  814. setDomestic
  815. 119.40
  816. 18.00
  817. subBase
  818. subCost
  819. subShip
  820. subTax
  821. setIntl
  822. 14.50
  823. 174.00
  824. 48.00
  825. subBase
  826. subCost
  827. subShip
  828. subTax
  829. setTotals
  830. setDomestic
  831. Renewal
  832. setDomestic
  833. LsetIntl
  834. subBase
  835. total
  836. subDomestic
  837. subBase
  838. subCost
  839. subShip
  840. subTax
  841. subOffer
  842. clearForm
  843. offer
  844. first
  845. title
  846. company
  847. address
  848. state
  849. country
  850. phone1
  851. phone2
  852. initButton
  853. special offer
  854. initButton
  855. pcVersion
  856. initButton
  857. initButton
  858. initButton
  859. clearTotals
  860. printThis
  861. printThis2
  862. initForm
  863. setDomestic
  864. initFields
  865. initButton
  866. pcVersion
  867. setTotals
  868. initFields
  869. first
  870. userInfo
  871. first
  872. title
  873. company
  874. address
  875. state
  876. buttonUp
  877. buttonUp
  878. buttonUp
  879. CANADA
  880. MEXICO
  881. buttonUp
  882. country
  883. phone1
  884. phone2
  885. buttonUp
  886. MasterCard
  887. buttonUp
  888. linkBook
  889. outsideShell
  890. initButton
  891. buttonUp
  892. verify
  893. first
  894. first,First Name
  895. last,Last Name
  896. address
  897. address,Address
  898. city,City
  899. state
  900. state,State
  901. zip,Zip
  902. phone1
  903. phone,Phone Number
  904. card,Credit Card
  905. exp,Expiration Date
  906. Country
  907. country,Country
  908. offer
  909. Offer Number (NAU # on the disc packaging)
  910. Where did you get this disc?
  911. offer
  912. mhInit
  913. clearForm
  914. gmhSaveAs
  915. enterPage
  916. Nothing selected!
  917. background
  918. foreground
  919. clear
  920. fldList
  921.